X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=Foreign%2FMarshal%2FAlloc.hs;h=3cf7174786ff1064877ebd05a1fbc70525874f2a;hb=68f60ec9d6004e36d572bc3b2d38b25a16530706;hp=1b9fe12f17e383aef34e55315fd42855bd6f83a5;hpb=576682304c4f358e64129d2e197d5216b4f779be;p=haskell-directory.git

diff --git a/Foreign/Marshal/Alloc.hs b/Foreign/Marshal/Alloc.hs
index 1b9fe12..3cf7174 100644
--- a/Foreign/Marshal/Alloc.hs
+++ b/Foreign/Marshal/Alloc.hs
@@ -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
 -- ------------------