From b9b8b3d3be885679056e823ec01f487ff75f4cfc Mon Sep 17 00:00:00 2001 From: stasinos Date: Tue, 15 Jan 2002 15:53:59 +0000 Subject: [PATCH] change the sig_pending flag into a stack git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@295 b08c6af1-5177-4d33-ba66-4b1c6b8b522a --- pl/debug.yap | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pl/debug.yap b/pl/debug.yap index 5cb4d07f4..c31da05a1 100644 --- a/pl/debug.yap +++ b/pl/debug.yap @@ -749,7 +749,7 @@ debugging :- '$recorded'('$sig_handler', action(S,A),_), '$execute'(A), '$handle_signals'(Rest). -'$handle_signals'([_|Rest]). +'$handle_signals'([_|Rest]) :- '$handle_signals'(Rest). '$msg'(P,G,Module,L,SL):- flush_output(user_output),