do not recover space if there is an overflow. (obs from Paulo Moura).

2010-02-01 21:43:45 +00:00 · 2010-02-01 21:43:45 +00:00 · 3b1ab8cfd9
commit 3b1ab8cfd9
parent 9d1f0cd361
1 changed files with 2 additions and 1 deletions
--- a/C/dbase.c
+++ b/C/dbase.c
@ -4950,7 +4950,8 @@ Term
 Yap_PopTermFromDB(DBTerm *ref)
 {
  Term t = GetDBTerm(ref);
-  ReleaseTermFromDB(ref);
+  if (t != 0L)
    ReleaseTermFromDB(ref);
  return t;
 }