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,7 +4950,8 @@ Term
Yap_PopTermFromDB(DBTerm *ref) Yap_PopTermFromDB(DBTerm *ref)
{ {
Term t = GetDBTerm(ref); Term t = GetDBTerm(ref);
ReleaseTermFromDB(ref); if (t != 0L)
ReleaseTermFromDB(ref);
return t; return t;
} }