X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FRegs.h;h=6524c8f669c79a97d965123e5013e939c0a49003;hb=2b52b76bf04d6bcb2f62971126451d9dc5d90871;hp=2c9546d02c7d3f20a7a6519a16019b5228f60459;hpb=6bf790bab31b9bb8791e2adc46c8ff511392419f;p=ghc-hetmet.git diff --git a/includes/Regs.h b/includes/Regs.h index 2c9546d..6524c8f 100644 --- a/includes/Regs.h +++ b/includes/Regs.h @@ -22,7 +22,13 @@ #ifndef REGS_H #define REGS_H +#if defined(HAVE_FRAMEWORK_GMP) +#include +#elif defined(HAVE_LIB_GMP) +#include +#else #include "gmp.h" // Needs MP_INT definition +#endif /* * Spark pools: used to store pending sparks @@ -333,7 +339,7 @@ struct PartCapability_ { /* No such thing as a MainCapability under THREADED_RTS - each thread must have * its own Capability. */ -#if IN_STG_CODE && !defined(THREADED_RTS) +#if IN_STG_CODE && !(defined(THREADED_RTS) && !defined(NOSMP)) extern W_ MainCapability[]; #endif @@ -349,7 +355,7 @@ extern W_ MainCapability[]; GLOBAL_REG_DECL(StgRegTable *,BaseReg,REG_Base) #define ASSIGN_BaseReg(e) (BaseReg = (e)) #else -#ifdef THREADED_RTS +#if defined(THREADED_RTS) && !defined(NOSMP) #error BaseReg must be in a register for THREADED_RTS #endif #define BaseReg (&((struct PartCapability_ *)MainCapability)->r)