From e7f9859025c2c2e1ba4363206345dcbfad0b855a Mon Sep 17 00:00:00 2001
From: Simon Marlow <marlowsd@gmail.com>
Date: Thu, 23 Jul 2009 12:39:01 +0000
Subject: [PATCH] Fix GC annotations in GMP_TAKE1_UL1_RET1()

---
 cbits/gmp-wrappers.cmm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cbits/gmp-wrappers.cmm b/cbits/gmp-wrappers.cmm
index 036fc6f..ee34aa2 100644
--- a/cbits/gmp-wrappers.cmm
+++ b/cbits/gmp-wrappers.cmm
@@ -274,7 +274,7 @@ name                                                                    \
   W_ mp_result;                                                         \
                                                                         \
   /* call doYouWantToGC() */                                            \
-  MAYBE_GC(R2_PTR & R4_PTR, name);                                      \
+  MAYBE_GC(R2_PTR, name);                                               \
                                                                         \
   STK_CHK_GEN( 2 * SIZEOF_MP_INT, R2_PTR, name );                       \
                                                                         \
-- 
GitLab