From f32af8a65a0531eb60b209a67caab5ea7a776ebd Mon Sep 17 00:00:00 2001
From: Richard Kistruck <rhsk@ravenbrook.com>
Date: Thu, 5 Feb 2009 15:51:30 +0000
Subject: [PATCH] mps br/timing poolamc.c: [temporary code] in order to allow
 ambig interior pointers to preserve objects in place, make amcnailgetmark()
 always return true.  this works: ambig interior pointers are sufficent to
 preserve in place the object they point into.

Copied from Perforce
 Change: 167343
 ServerID: perforce.ravenbrook.com
---
 mps/code/poolamc.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mps/code/poolamc.c b/mps/code/poolamc.c
index db3db9a0def..6339aeb809a 100644
--- a/mps/code/poolamc.c
+++ b/mps/code/poolamc.c
@@ -756,7 +756,7 @@ static Bool amcNailGetMark(Seg seg, Ref ref)
   AVERT(amcNailboard, board);
 
   i = AddrOffset(SegBase(seg), ref) >> board->markShift;
-  return BTGet(board->mark, i);
+  return TRUE; /* BTGet(board->mark, i); RHSK-hack */
 }