X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Foreign%2FC%2FTypesISO.hs;h=ae7c21c27797d7e3b2ee0a8ed6e7fb6fb70cb0be;hb=efc37fdab381c901c4957e3c94119b3e10385513;hp=014c11997ee3878b329b2f4c5b502975e3ae2270;hpb=c4bfba7c3d39965a24ea6e7d3f2549979a1f2f85;p=ghc-base.git diff --git a/Foreign/C/TypesISO.hs b/Foreign/C/TypesISO.hs index 014c119..ae7c21c 100644 --- a/Foreign/C/TypesISO.hs +++ b/Foreign/C/TypesISO.hs @@ -31,6 +31,7 @@ import Data.Bits ( Bits(..) ) import Data.Int import Data.Word import Data.Dynamic +import Foreign.Storable #ifdef __GLASGOW_HASKELL__ import GHC.Base @@ -39,6 +40,9 @@ import GHC.Real import GHC.Show import GHC.Read import GHC.Num +#else +import Control.Monad +import Foreign.Ptr #endif #include "Dynamic.h"