X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FStorage.h;h=e541193573cfdbcf73ace1888696771e96b20659;hb=170a6564229788618fb86fbb3be6662bf8e566a0;hp=f8532e03c1ddaa223d5dbae75c645804c7b5aede;hpb=5fb52815fa7aef4a4793eb58a909bd5465b77bb4;p=ghc-hetmet.git

diff --git a/rts/sm/Storage.h b/rts/sm/Storage.h
index f8532e0..e541193 100644
--- a/rts/sm/Storage.h
+++ b/rts/sm/Storage.h
@@ -11,7 +11,7 @@
 
 #include "Capability.h"
 
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
 
 /* -----------------------------------------------------------------------------
    Initialisation / De-initialisation
@@ -19,7 +19,7 @@ BEGIN_RTS_PRIVATE
 
 void initStorage(void);
 void exitStorage(void);
-void freeStorage(void);
+void freeStorage(rtsBool free_heap);
 
 /* -----------------------------------------------------------------------------
    Storage manager state
@@ -151,6 +151,6 @@ void move_TSO  (StgTSO *src, StgTSO *dest);
 extern StgClosure * caf_list;
 extern StgClosure * revertible_caf_list;
 
-END_RTS_PRIVATE
+#include "EndPrivate.h"
 
 #endif /* SM_STORAGE_H */