+++ /dev/null
-{-# OPTIONS -fglasgow-exts #-}
-
--- Replacement for GHC.Handle module
-
-module GHC_ExtCore.Handle(Handle(..), stdin, stderr, stdout, hFlush) where
-
-import GHC.Exts
-
-newtype Handle = H Int
-
--- these shouldn't actually get used
-stdout, stdin, stderr :: Handle
-stdin = H 0
-stdout = H 1
-stderr = H 2
-
--- ditto
-hFlush :: Handle -> IO ()
-hFlush _ = return ()