RTS tidyup sweep, first phase

[ghc-hetmet.git] / includes / stg / Regs.h

diff --git a/includes/Regs.h b/includes/stg/Regs.h
similarity index 99%
rename from includes/Regs.h
rename to includes/stg/Regs.h
index beb71c9..fb26254 100644 (file)
--- a/includes/Regs.h
+++ b/includes/stg/Regs.h
@@ -37,14 +37,9 @@ typedef union {
     StgWord        w;
     StgAddr        a;
     StgChar        c;
-    StgInt8        i8;
     StgFloat       f;
     StgInt         i;
     StgPtr         p;
-    StgClosurePtr  cl;
-    StgStackOffset offset;     /* unused? */
-    StgByteArray   b;
-    StgTSOPtr      t;
 } StgUnion;
 
 /*