diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix debugging of log update predicates.

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@785 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2003-02-19 16:54:34 +00:00
parent 8334aa1f5e
commit 42ed54c331
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pl/debug.yap
View File

@ -551,7 +551,7 @@ debugging :-
(Index = [] -> (Index = [] ->
/* We have a single clause */ /* We have a single clause */
Cl = 1, Cl = 1,
'$clause'(G, M, Clause) '$clause'(G, M, Clause,_)
; ;
Cl1 is Cl-1, Cl1 is Cl-1,
'$fetch_reference_from_index'(Index, Cl1, Ref), '$fetch_reference_from_index'(Index, Cl1, Ref),
@ -615,7 +615,7 @@ debugging :-
(Index = [] -> (Index = [] ->
/* We have a single clause */ /* We have a single clause */
Cl = 1, Cl = 1,
'$clause'(G, M, Clause) '$clause'(G, M, Clause,_)
; ;
Cl1 is Cl-1, Cl1 is Cl-1,
'$fetch_reference_from_index'(Index, Cl1, Ref), '$fetch_reference_from_index'(Index, Cl1, Ref),