From: Malcolm.Wallace@cs.york.ac.uk <unknown>
Date: Mon, 4 Aug 2008 16:06:16 +0000 (+0000)
Subject: poke and peek come from Foreign.Storable
X-Git-Tag: 6_10_branch_has_been_forked~90
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=2b1aafe0994eb6bdab1f6802f584c6d00047a14f;p=ghc-base.git

poke and peek come from Foreign.Storable
---

diff --git a/Foreign/C/Error.hs b/Foreign/C/Error.hs
index 77d2738..950a7a4 100644
--- a/Foreign/C/Error.hs
+++ b/Foreign/C/Error.hs
@@ -118,6 +118,7 @@ import System.IO.Unsafe         ( unsafePerformIO )
 import System.IO                ( Handle )
 import System.IO.Error          ( IOError, ioError )
 import System.IO.Unsafe         ( unsafePerformIO )
+import Foreign.Storable         ( Storable(poke,peek) )
 #endif
 
 #ifdef __HUGS__