threads, clean signals, and much more...

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@957 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2004-01-23 02:23:51 +00:00
parent 437a6a19ab
commit ba9876268f
54 changed files with 17285 additions and 6361 deletions
--- a/pl/debug.yap
+++ b/pl/debug.yap
@@ -244,23 +244,12 @@ debugging :-
 %	when 1 spying is enabled *(the same as spy stop).


-'$creep'([Mod|G]) :-
-	'$stop_debugging',
-	CP is '$last_choice_pt',	
-	'$do_spy'(G, Mod, CP, no).
-
 %'$spy'(G) :- write(user_error,'$spy'(G)), nl, fail.
 %
 % handle suspended goals
 % take care with hidden goals.
 %
 % $spy may be called from user code, so be careful.
-'$spy'(G) :-
-	'$stop_debugging',
-	% we can start working now.
-	'$awoken_goals'(LG), !,
-	'$creep',
-	'$wake_up_goal'(G, LG).
 '$spy'([Mod|G]) :-
 	CP is '$last_choice_pt',	
 	'$do_spy'(G, Mod, CP, no).