X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FStgCRun.c;h=92ce6ebb19742699e34949b33fd5503d9ac6a083;hb=661c97c65e5fa47177502e592bb763f752b487ac;hp=376e8240555b1f28961191e88230203edaf9d76a;hpb=a8b5e840ebb42522992749eb9afd1a9ba870d234;p=ghc-hetmet.git

diff --git a/rts/StgCRun.c b/rts/StgCRun.c
index 376e824..92ce6eb 100644
--- a/rts/StgCRun.c
+++ b/rts/StgCRun.c
@@ -34,7 +34,6 @@
 
 #include "PosixSource.h"
 
-
 /*
  * We define the following (unused) global register variables, because for
  * some reason gcc generates sub-optimal code for StgRun() on the Alpha
@@ -66,11 +65,12 @@ register double fake_f9 __asm__("$f9");
 /* include Stg.h first because we want real machine regs in here: we
  * have to get the value of R1 back from Stg land to C land intact.
  */
+// yeuch
+#define IN_STGCRUN 1
 #include "Stg.h"
 #include "Rts.h"
+
 #include "StgRun.h"
-#include "RtsFlags.h"
-#include "OSThreads.h"
 #include "Capability.h"
 
 #ifdef DEBUG