diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

more bigint and dbterm fixes.

Browse Source
This commit is contained in:
Vítor Santos Costa
2010-12-16 22:21:46 +00:00
parent 5a2d908489
commit cfe0dda995
11 changed files with 198 additions and 105 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
H/rheap.h
View File

@@ -250,10 +250,11 @@ ConstantTermAdjust (Term t)
static Term
DBGroundTermAdjust (Term t)
{
/* The term itself is restored by dbtermlist */
if (IsPairTerm(t)) {
return AdjustDBTerm(t, PtoHeapCellAdjust(RepPair(t)));
return AbsPair(PtoHeapCellAdjust(RepPair(t)));
} else {
return AdjustDBTerm(t, PtoHeapCellAdjust(RepAppl(t)));
return AbsAppl(PtoHeapCellAdjust(RepAppl(t)));
}
}