From: Simon Marlow <simonmar@microsoft.com>
Date: Wed, 5 Apr 2006 14:51:26 +0000 (+0000)
Subject: add freeStorage() prototype
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=33273cefac6b8a82222893b69e3e1f54052f282c;p=ghc-hetmet.git

add freeStorage() prototype
---

diff --git a/ghc/includes/Storage.h b/ghc/includes/Storage.h
index 46081ad..3a6bb2f 100644
--- a/ghc/includes/Storage.h
+++ b/ghc/includes/Storage.h
@@ -109,6 +109,7 @@ extern generation * RTS_VAR(oldest_gen);
 
 extern void initStorage(void);
 extern void exitStorage(void);
+extern void freeStorage(void);
 
 /* -----------------------------------------------------------------------------
    Generic allocation