From c5c775f933d369b709b738033b8b2fa17bf17e5c Mon Sep 17 00:00:00 2001
From: vsc <vsc@b08c6af1-5177-4d33-ba66-4b1c6b8b522a>
Date: Wed, 18 Apr 2001 12:24:45 +0000
Subject: [PATCH] - early_reset and simple_shunting on - fix non early_reset

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@10 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
---
 C/heapgc.c | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/C/heapgc.c b/C/heapgc.c
index 288ec7a59..76df6ea10 100644
--- a/C/heapgc.c
+++ b/C/heapgc.c
@@ -22,8 +22,8 @@ static char     SccsId[] = "%W% %G%";
 #include "yapio.h"
 
 
-/* #define EARLY_RESET 1 */
-/* #define SIMPLE_SHUNTING 1 */
+#define EARLY_RESET 1
+#define SIMPLE_SHUNTING 1
 
 #ifdef MULTI_ASSIGNMENT_VARIABLES
 /* 
@@ -1035,8 +1035,10 @@ mark_trail(tr_fr_ptr trail_ptr, tr_fr_ptr trail_base, CELL *gc_H, choiceptr gc_B
 	RESET_VARIABLE(&TrailVal(trail_ptr));
 #endif
 #else
+	printf("should be doing early reset\n");
 	/* if I have no early reset I have to follow the trail chain */
 	mark_external_reference(&TrailTerm(trail_ptr));	
+	UNMARK(&TrailTerm(trail_ptr));
 #endif /* EARLY_RESET */
       } else {
 	if (hp < (CELL *)HeapTop) {