oopsy doopsy

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@1129 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Linas Vepstas 1998-09-09 06:42:17 +00:00
parent 523fff5a21
commit 2c49041fb4

View File

@ -25,30 +25,3 @@ main(int argc, char *argv[]) {
gh_enter(argc, argv, guile_entry_point);
return 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;
}