Handle -d option in prolog

1 files changed, 2 insertions, 2 deletions

diff --git a/eval.c b/eval.c
index f957553..09bb009 100644
--- a/eval.c
+++ b/eval.c
@@ -25,7 +25,7 @@ evalquery(Term *query)
 		if(catcher)
 			continue;
 
-		if(debug)
+		if(flagdebug)
 			print("Working goal: %S:%S\n", module->name, prettyprint(goal, 0, 0, 0, nil));
 
 		Binding *bindings = nil;
@@ -76,7 +76,7 @@ evalquery(Term *query)
 Backtrack:
 				if(choicestack == nil)
 					return 0;
-				if(debug)
+				if(flagdebug)
 					print("Backtracking..\n");
 				Choicepoint *cp = choicestack;
 				choicestack = cp->next;