-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , MagicHash
+ , UnboxedTuples
+ , ForeignFunctionInterface
+ #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal.Alloc
import GHC.Ptr
import GHC.Err
import GHC.Base
-import GHC.Num
#elif defined(__NHC__)
import NHC.FFI ( FinalizerPtr, CInt(..) )
import IO ( bracket )