import PrelGHC
import PrelBase
-import PrelAddr ( Addr(..) )
+import PrelAddr ( Addr(..), Word(..) )
import PrelST
import IOExts
import PrelIOBase
import ByteArray
import MutableArray
import Monad
-import Foreign
type PrimIO a = IO a
primIOToIO io = io