be careful about testing for attvars.

This commit is contained in:
Vítor Santos Costa II 2010-04-12 17:21:19 +01:00
parent 4ccc201322
commit b10268def1
1 changed files with 1 additions and 1 deletions

View File

@ -2480,7 +2480,7 @@ sweep_trail(choiceptr gc_B, tr_fr_ptr old_TR)
CELL *pt0 = RepPair(trail_cell);
CELL flags;
if (IsAttVar(pt0)) {
if (IN_BETWEEN(H0, pt0, H) && IsAttVar(pt0)) {
TrailTerm(dest) = trail_cell;
/* be careful with partial gc */
if (HEAP_PTR(TrailTerm(dest))) {