RTS tidyup sweep, first phase

[ghc-hetmet.git] / compiler / main / Constants.lhs

diff --git a/compiler/main/Constants.lhs b/compiler/main/Constants.lhs
index d26db11..106c9a7 100644 (file)
--- a/compiler/main/Constants.lhs
+++ b/compiler/main/Constants.lhs
@@ -13,11 +13,9 @@ import Data.Bits (shiftL)
 -- we want; if we just hope a -I... will get the right one, we could
 -- be in trouble.
 
--- XXX This define is a bit of a hack, and should be done more nicely
-#define FAST_STRING_NOT_NEEDED 1
 #include "HsVersions.h"
-#include "../includes/MachRegs.h"
-#include "../includes/Constants.h"
+#include "../includes/stg/MachRegs.h"
+#include "../includes/rts/Constants.h"
 #include "../includes/MachDeps.h"
 #include "../includes/DerivedConstants.h"
 
@@ -109,9 +107,6 @@ sTD_HDR_SIZE = STD_HDR_SIZE
 
 pROF_HDR_SIZE :: Int
 pROF_HDR_SIZE = PROF_HDR_SIZE
-
-gRAN_HDR_SIZE :: Int
-gRAN_HDR_SIZE = GRAN_HDR_SIZE
 \end{code}
 
 Size of a double in StgWords.