From 98b4f64b4082c36bc8c0daebbf8355304c045a47 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa?= Date: Mon, 4 Nov 2013 22:31:43 +0000 Subject: [PATCH] syntax error --- pl/control.yap | 2 +- pl/debug.yap | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/pl/control.yap b/pl/control.yap index d759a290e..448150653 100644 --- a/pl/control.yap +++ b/pl/control.yap @@ -327,7 +327,7 @@ break :- nb_getval('$debug_jump',Jump), nb_getval('$debug_run',Run), '$swi_current_prolog_flag'(debug, Debug), - '$swi_set_prolog_flag'(debug, false) + '$swi_set_prolog_flag'(debug, false), nb_getval('$break',BL), NBL is BL+1, nb_getval('$spy_gn',SPY_GN), b_getval('$spy_glist',GList), diff --git a/pl/debug.yap b/pl/debug.yap index 073ea83d6..72d60f0f6 100644 --- a/pl/debug.yap +++ b/pl/debug.yap @@ -651,7 +651,7 @@ debugging :- read(user,G), % don't allow yourself to be caught by creep. '$swi_current_prolog_flag'(debug, OldDeb), - '$swi_set_prolog_flag'(debug, false) + '$swi_set_prolog_flag'(debug, false), ( '$execute'(G) -> true ; true), '$swi_set_prolog_flag'(debug, OldDeb), % '$skipeol'(0'!), % '