[project @ 1996-06-27 16:55:06 by partain]

[ghc-hetmet.git] / ghc / lib / prelude / TyIO_mg.hi

diff --git a/ghc/lib/prelude/TyIO_mg.hi b/ghc/lib/prelude/TyIO_mg.hi
deleted file mode 100644 (file)
index c674bbe..0000000
--- a/ghc/lib/prelude/TyIO_mg.hi
+++ /dev/null
@@ -1,15 +0,0 @@
-{-# GHC_PRAGMA INTERFACE VERSION 5 #-}
-interface PreludeIO where
-import PreludeBuiltin(Bin, Char(..), Int(..), List(..))
-import PreludeCore(Bool(..))
-type BinCont = Bin -> [Response] -> [Request]
-type Dialogue = [Response] -> [Request]
-type FailCont = IOError -> [Response] -> [Request]
-data IOError   = WriteError [Char] | ReadError [Char] | SearchError [Char] | FormatError [Char] | OtherError [Char] | EOD
-data Request   = ReadFile [Char] | WriteFile [Char] [Char] | AppendFile [Char] [Char] | ReadBinFile [Char] | WriteBinFile [Char] Bin | AppendBinFile [Char] Bin | DeleteFile [Char] | StatusFile [Char] | ReadChan [Char] | AppendChan [Char] [Char] | ReadBinChan [Char] | AppendBinChan [Char] Bin | StatusChan [Char] | Echo Bool | GetArgs | GetProgName | GetEnv [Char] | SetEnv [Char] [Char] | SigAction Int SigAct
-data Response   = Success | Str [Char] | StrList [[Char]] | Bn Bin | Failure IOError
-data SigAct   = SAIgnore | SADefault | SACatch ([Response] -> [Request])
-type StrCont = [Char] -> [Response] -> [Request]
-type StrListCont = [[Char]] -> [Response] -> [Request]
-type SuccCont = [Response] -> [Request]
-