projects
/
ghc-base.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
41e872f
)
[project @ 2003-05-22 10:59:47 by ross]
author
ross
<unknown>
Thu, 22 May 2003 10:59:47 +0000
(10:59 +0000)
committer
ross
<unknown>
Thu, 22 May 2003 10:59:47 +0000
(10:59 +0000)
unbreak for Hugs
Foreign/Marshal/Alloc.hs
patch
|
blob
|
history
diff --git
a/Foreign/Marshal/Alloc.hs
b/Foreign/Marshal/Alloc.hs
index
65294ce
..
1b9fe12
100644
(file)
--- a/
Foreign/Marshal/Alloc.hs
+++ b/
Foreign/Marshal/Alloc.hs
@@
-30,11
+30,11
@@
module Foreign.Marshal.Alloc (
import Data.Maybe
import Foreign.Ptr ( Ptr, nullPtr, FunPtr )
import Data.Maybe
import Foreign.Ptr ( Ptr, nullPtr, FunPtr )
-import Foreign.ForeignPtr ( FinalizerPtr )
import Foreign.C.Types ( CSize )
import Foreign.Storable ( Storable(sizeOf) )
#ifdef __GLASGOW_HASKELL__
import Foreign.C.Types ( CSize )
import Foreign.Storable ( Storable(sizeOf) )
#ifdef __GLASGOW_HASKELL__
+import Foreign.ForeignPtr ( FinalizerPtr )
import GHC.IOBase
import GHC.Real
import GHC.Ptr
import GHC.IOBase
import GHC.Real
import GHC.Ptr
@@
-46,6
+46,9
@@
import IO ( bracket )
import Control.Exception ( bracket )
#endif
import Control.Exception ( bracket )
#endif
+#ifdef __HUGS__
+import Hugs.ForeignPtr ( FinalizerPtr )
+#endif
-- exported functions
-- ------------------
-- exported functions
-- ------------------