RTS tidyup sweep, first phase

[ghc-hetmet.git] / includes / rts / storage / MBlock.h

diff --git a/rts/sm/MBlock.h b/includes/rts/storage/MBlock.h
similarity index 98%
rename from rts/sm/MBlock.h
rename to includes/rts/storage/MBlock.h
index f9dddc3..03396c1 100644 (file)
--- a/rts/sm/MBlock.h
+++ b/includes/rts/storage/MBlock.h
@@ -9,12 +9,10 @@
  *
  * ---------------------------------------------------------------------------*/
 
  *
  * ---------------------------------------------------------------------------*/
 

-#ifndef MBLOCK_H
-#define MBLOCK_H
+#ifndef RTS_STORAGE_MBLOCK_H
+#define RTS_STORAGE_MBLOCK_H

 
 

-#include "GC.h"
-
-extern lnat RTS_VAR(mblocks_allocated);
+extern lnat mblocks_allocated;

 
 extern void initMBlocks(void);
 extern void * getMBlock(void);
 
 extern void initMBlocks(void);
 extern void * getMBlock(void);

@@ -205,4 +203,4 @@ StgBool HEAP_ALLOCED_GC(void *p)
 # error HEAP_ALLOCED not defined
 #endif
 
 # error HEAP_ALLOCED not defined
 #endif
 

-#endif /* MBLOCK_H */
+#endif /* RTS_STORAGE_MBLOCK_H */