cleanup by Rob Browning

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@1122 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Linas Vepstas 1998-09-09 05:46:08 +00:00
parent a2d9a1e3d1
commit ad38af026c

View File

@ -1,27 +0,0 @@
#include <stdio.h>
#include <readline.h>
#include <history.h>
#include <guile/gh.h>
#include <FileIO.h>
static void
guile_entry_point(int argc, char *argv[]) {
char *input;
xacc();
input = readline("xacc> ");
while(input) {
SCM result = gh_eval_str(input);
gh_display(result);
gh_newline();
add_history(input);
free(input);
input = readline("xacc> ");
}
}
int
main(int argc, char *argv[]) {
gh_enter(argc, argv, guile_entry_point);
return 0;
}