From 2b10f811258b140df23e923c427a5880eff247e5 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Thu, 25 Jan 2007 09:53:54 +0000 Subject: [PATCH] fix gmp header problem svn: r5458 --- src/mzscheme/src/gmp/gmp.h | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/src/mzscheme/src/gmp/gmp.h b/src/mzscheme/src/gmp/gmp.h index 5db0b6411c..95ed6cb3be 100644 --- a/src/mzscheme/src/gmp/gmp.h +++ b/src/mzscheme/src/gmp/gmp.h @@ -268,6 +268,12 @@ extern __gmp_const int mp_bits_per_limb; /* #define mpn_xnor_n __MPN(xnor_n) */ /* #define mpn_xor_n __MPN(xor_n) */ +#ifdef MZ_PRECISE_GC +# define XFORM_GMP_NONGCING XFORM_NONGCING +#else +# define XFORM_GMP_NONGCING /**/ +#endif + #if defined (__cplusplus) extern "C" { #endif @@ -283,7 +289,7 @@ mp_limb_t mpn_addmul_1c _PROTO ((mp_ptr, mp_srcptr, mp_size_t, mp_limb_t, mp_lim mp_limb_t mpn_addsub_n _PROTO ((mp_ptr, mp_ptr, mp_srcptr, mp_srcptr, mp_size_t)); mp_limb_t mpn_bdivmod _PROTO ((mp_ptr, mp_ptr, mp_size_t, mp_srcptr, mp_size_t, unsigned long int)); -XFORM_NONGCING int mpn_cmp _PROTO ((mp_srcptr, mp_srcptr, mp_size_t)); +XFORM_GMP_NONGCING int mpn_cmp _PROTO ((mp_srcptr, mp_srcptr, mp_size_t)); #define mpn_divexact_by3(dst, src, size) mpn_divexact_by3c (dst, src, size, 0)