Remove ext-core

[ghc-hetmet.git] / utils / ext-core / lib / GHC_ExtCore / IO.hs

diff --git a/utils/ext-core/lib/GHC_ExtCore/IO.hs b/utils/ext-core/lib/GHC_ExtCore/IO.hs
deleted file mode 100644 (file)
index 81d9226..0000000
--- a/utils/ext-core/lib/GHC_ExtCore/IO.hs
+++ /dev/null
@@ -1,21 +0,0 @@
-{-# OPTIONS -fglasgow-exts #-}
-
--- Replacement for GHC.IO module
-
-module GHC_ExtCore.IO where
-
-import GHC.Exts
-import GHC_ExtCore.Handle
-
-hPutStr :: Handle -> String -> IO ()
-hPutStr h s = mapM_ (hPutChar h) s
-
-hPutChar :: Handle -> Char -> IO ()
-hPutChar (H (I# i)) (C# c) = hPutChar# i c
-
-------------------------------------------------------------
--- fake stubs for primops to fool GHC into typechecking this
-------------------------------------------------------------
-{-# NOINLINE hPutChar# #-}
-hPutChar# :: Int# -> Char# -> IO ()
-hPutChar# _ _ = return ()