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

This commit is contained in:
Vitor Santos Costa 2010-02-01 21:43:45 +00:00
parent 9d1f0cd361
commit 3b1ab8cfd9

View File

@ -4950,6 +4950,7 @@ Term
Yap_PopTermFromDB(DBTerm *ref) Yap_PopTermFromDB(DBTerm *ref)
{ {
Term t = GetDBTerm(ref); Term t = GetDBTerm(ref);
if (t != 0L)
ReleaseTermFromDB(ref); ReleaseTermFromDB(ref);
return t; return t;
} }