RTS tidyup sweep, first phase
[ghc-hetmet.git] / includes / rts / storage / FunTypes.h
similarity index 92%
rename from includes/StgFun.h
rename to includes/rts/storage/FunTypes.h
index e6f9b1f..402c913 100644 (file)
@@ -1,11 +1,13 @@
 /* -----------------------------------------------------------------------------
 /* -----------------------------------------------------------------------------
+ *
  * (c) The GHC Team, 2002
  *
  * Things for functions.
  * (c) The GHC Team, 2002
  *
  * Things for functions.
+ *
  * ---------------------------------------------------------------------------*/
 
  * ---------------------------------------------------------------------------*/
 
-#ifndef STGFUN_H
-#define STGFUN_H
+#ifndef RTS_STORAGE_FUNTYPES_H
+#define RTS_STORAGE_FUNTYPES_
 
 /* generic - function comes with a small bitmap */
 #define ARG_GEN      0   
 
 /* generic - function comes with a small bitmap */
 #define ARG_GEN      0   
@@ -49,4 +51,4 @@
 #define ARG_PPPPPPP  24
 #define ARG_PPPPPPPP 25
 
 #define ARG_PPPPPPP  24
 #define ARG_PPPPPPPP 25
 
-#endif /* STGFUN_H */
+#endif /* RTS_STORAGE_FUNTYPES_H */