fix debugging messages.
This commit is contained in:
parent
03ed764580
commit
313273cce0
@ -3174,7 +3174,6 @@ YAP_Record(Term t)
|
|||||||
dbt->prev_rec = NULL;
|
dbt->prev_rec = NULL;
|
||||||
dbt->dbrecord = dbterm;
|
dbt->dbrecord = dbterm;
|
||||||
Yap_Records = dbt;
|
Yap_Records = dbt;
|
||||||
fprintf(stderr,"adding %p\n", dbt);
|
|
||||||
return dbt;
|
return dbt;
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -3182,7 +3181,6 @@ X_API Term
|
|||||||
YAP_Recorded(void *handle)
|
YAP_Recorded(void *handle)
|
||||||
{
|
{
|
||||||
Term t;
|
Term t;
|
||||||
fprintf(stderr,"reading %p\n", handle);
|
|
||||||
DBTerm *dbterm = ((DBRecordList *)handle)->dbrecord;
|
DBTerm *dbterm = ((DBRecordList *)handle)->dbrecord;
|
||||||
|
|
||||||
BACKUP_MACHINE_REGS();
|
BACKUP_MACHINE_REGS();
|
||||||
@ -3215,7 +3213,6 @@ YAP_Recorded(void *handle)
|
|||||||
X_API int
|
X_API int
|
||||||
YAP_Erase(void *handle)
|
YAP_Erase(void *handle)
|
||||||
{
|
{
|
||||||
fprintf(stderr,"erasing %p\n", handle);
|
|
||||||
DBRecordList *dbr = (DBRecordList *)handle;
|
DBRecordList *dbr = (DBRecordList *)handle;
|
||||||
Yap_ReleaseTermFromDB(dbr->dbrecord);
|
Yap_ReleaseTermFromDB(dbr->dbrecord);
|
||||||
if (dbr->next_rec)
|
if (dbr->next_rec)
|
||||||
|
Reference in New Issue
Block a user