diff options
Diffstat (limited to 'main.c')
-rw-r--r-- | main.c | 10 |
1 files changed, 7 insertions, 3 deletions
@@ -29,11 +29,15 @@ main(int argc, char *argv[]) int fd = open(parsetestfile, OREAD); if(fd < 0) exits("open"); - Term *prog = parse(fd); + Term *database = parse(fd, 0); Term *goal; - for(goal = initgoals; goal != nil; goal = goal->next) - evalquery(prog, goal); + for(goal = initgoals; goal != nil; goal = goal->next){ + Binding *bindings = nil; + evalquery(database, goal, &bindings); + } + + repl(database); } exits(nil); |