summaryrefslogtreecommitdiff
path: root/main.c
diff options
context:
space:
mode:
Diffstat (limited to 'main.c')
-rw-r--r--main.c9
1 files changed, 2 insertions, 7 deletions
diff --git a/main.c b/main.c
index 826ff45..cdaf137 100644
--- a/main.c
+++ b/main.c
@@ -11,7 +11,6 @@ void repl(int, char **);
void
main(int argc, char *argv[])
{
- clausenr = 2; /* Start at two since 0 is for the facts in the database, and 1 is for queries */
initflags();
initstreams();
initmodules();
@@ -37,10 +36,6 @@ repl(int argc, char *argv[])
argc--;
}
args = mklist(args);
- Term *mod = mkatom(L"loader");
- Term *pred = mkcompound(L"start", 1, args);
-
- mod->next = pred;
- Term *goal = mkcompound(L":", 2, mod);
- evalquery(goal);
+ Term *start = mkcompound(L"start", 1, args);
+ evalquery(start);
} \ No newline at end of file