[project @ 1996-07-25 20:43:49 by partain]

[ghc-hetmet.git] / ghc / lib / prelude / PreludeGlaST.hs

diff --git a/ghc/lib/prelude/PreludeGlaST.hs b/ghc/lib/prelude/PreludeGlaST.hs
index 11f6cf7..179b648 100644 (file)
--- a/ghc/lib/prelude/PreludeGlaST.hs
+++ b/ghc/lib/prelude/PreludeGlaST.hs
@@ -8,7 +8,7 @@ module PreludeGlaST (
        MutableArray,
        MutableByteArray,
        PrimIO,
-       Addr, Word,
+       Addr(..), Word(..),
        CCallable(..), CReturnable(..),
 
        boundsOfArray,
@@ -57,6 +57,7 @@ module PreludeGlaST (
        returnPrimIO,
        returnST,
        returnStrictlyST,
+       runST,
        primIOToIO,
        ioToPrimIO,
        sameMutableArray,
@@ -82,6 +83,12 @@ module PreludeGlaST (
        writeFloatArray,
        writeIntArray,
        writeVar
+#ifndef __PARALLEL_HASKELL__
+       , makeStablePtr
+       , deRefStablePtr
+       , freeStablePtr
+       , performGC
+#endif
     ) where
 
 import GHCbase