From b10268def14332509ad277741e46cb94b657a488 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa=20II?= <vsc@dcc.fc.up.pt>
Date: Mon, 12 Apr 2010 17:21:19 +0100
Subject: [PATCH] be careful about testing for attvars.

---
 C/heapgc.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C/heapgc.c b/C/heapgc.c
index 53b939497..ade299df5 100644
--- a/C/heapgc.c
+++ b/C/heapgc.c
@@ -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))) {