X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FRts.h;h=b5737d4d0e4d83cdafcfd5854e06ba5cab1137ab;hb=4b8dfb01980b44bc3284c87aadeada130f94f85f;hp=b038867e0105c659de9192773f03f58fd1695724;hpb=dd56e9ab4544e83d27532a8d9058140bfe81825c;p=ghc-hetmet.git

diff --git a/includes/Rts.h b/includes/Rts.h
index b038867..b5737d4 100644
--- a/includes/Rts.h
+++ b/includes/Rts.h
@@ -51,7 +51,9 @@ extern "C" {
 
 /* Needed to get the macro version of errno on some OSs, and also to
    get prototypes for the _r versions of C library functions. */
+#ifndef _REENTRANT
 #define _REENTRANT 1
+#endif
 
 /*
  * We often want to know the size of something in units of an
@@ -175,13 +177,6 @@ TAG_CLOSURE(StgWord tag,StgClosure * p)
 #include "SMPClosureOps.h"
 #include "SpinLock.h"
 
-/* GNU mp library */
-#if defined(HAVE_FRAMEWORK_GMP)
-#include <GMP/gmp.h>
-#else
-#include "gmp.h"
-#endif
-
 /* Macros for STG/C code */
 #include "Block.h"
 #include "ClosureMacros.h"
@@ -205,8 +200,6 @@ DLL_IMPORT_RTS extern char  *prog_name;
 
 extern void stackOverflow(void);
 
-extern void      __decodeDouble (MP_INT *man, I_ *_exp, StgDouble dbl);
-extern void      __decodeFloat  (MP_INT *man, I_ *_exp, StgFloat flt);
 extern void      __decodeDouble_2Int (I_ *man_sign, W_ *man_high, W_ *man_low, I_ *exp, StgDouble dbl);
 extern void      __decodeFloat_Int (I_ *man, I_ *exp, StgFloat flt);