[project @ 2003-05-27 16:57:09 by malcolm]
[haskell-directory.git] / Foreign / Marshal / Alloc.hs
index 1b9fe12..3cf7174 100644 (file)
@@ -41,6 +41,7 @@ import GHC.Ptr
 import GHC.Err
 import GHC.Base
 #elif defined(__NHC__)
+import NHC.FFI                 ( FinalizerPtr, CInt(..) )
 import IO                      ( bracket )
 #else
 import Control.Exception       ( bracket )
@@ -50,6 +51,7 @@ import Control.Exception      ( bracket )
 import Hugs.ForeignPtr         ( FinalizerPtr )
 #endif
 
+
 -- exported functions
 -- ------------------