remove debugging message.
This commit is contained in:
parent
32b08082f7
commit
0cd9009132
1
C/exec.c
1
C/exec.c
@ -1408,7 +1408,6 @@ clean_trail(Term t)
|
|||||||
|
|
||||||
pbase = B->cp_tr;
|
pbase = B->cp_tr;
|
||||||
pt1 = TR - 1;
|
pt1 = TR - 1;
|
||||||
fprintf(stderr,"pbase=%p TR=%p\n",pbase,TR);
|
|
||||||
while (pt1 >= pbase) {
|
while (pt1 >= pbase) {
|
||||||
Term d1 = TrailTerm(pt1);
|
Term d1 = TrailTerm(pt1);
|
||||||
if (IsVarTerm(d1)) {
|
if (IsVarTerm(d1)) {
|
||||||
|
Reference in New Issue
Block a user