X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=Foreign%2FStorable.hs;h=0b0ad0cda1906ca4a8923bbe7ecb93e68f2e3760;hb=8afc9fecd586d3c4f7ef9c69fb1686a79e5f441d;hp=832efb3a15deef3e6a59d5916c0699c30b08e366;hpb=0194bd1aa23f3c93c9fea3f6acdf5b968c024886;p=ghc-base.git

diff --git a/Foreign/Storable.hs b/Foreign/Storable.hs
index 832efb3..0b0ad0c 100644
--- a/Foreign/Storable.hs
+++ b/Foreign/Storable.hs
@@ -42,6 +42,7 @@ import Control.Monad            ( liftM )
 #ifdef __GLASGOW_HASKELL__
 import GHC.Storable
 import GHC.Stable       ( StablePtr )
+import GHC.IO()		-- Instance Monad IO
 import GHC.Num
 import GHC.Int
 import GHC.Word