1 files changed, 2 insertions, 0 deletions
diff --git a/repl.c b/repl.c
index bd584eb..bf08164 100644
--- a/repl.c
+++ b/repl.c
@@ -15,6 +15,8 @@ repl(Term *database)
 		print("?- ");
 		Term *query = parse(fd, nil, 1);
 		Binding *bindings = nil;
+		choicestack = nil;
+		goalstack = nil; /* should free old choicestack and goalstack */
 		int success;
 FindMore:
 		success = evalquery(database, query, &bindings);