X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Flib%2Fghc%2FReadline_mg.hi;fp=ghc%2Flib%2Fghc%2FReadline_mg.hi;h=0000000000000000000000000000000000000000;hb=4860241b9fe5daa328fbfabfa87c4af84ac49b65;hp=a63569030779c863b851528a7ccd5e8ffc8d59f7;hpb=c6c43e43be1f913cd90cb7cb5bb87e90e6552691;p=ghc-hetmet.git diff --git a/ghc/lib/ghc/Readline_mg.hi b/ghc/lib/ghc/Readline_mg.hi deleted file mode 100644 index a635690..0000000 --- a/ghc/lib/ghc/Readline_mg.hi +++ /dev/null @@ -1,44 +0,0 @@ -{-# GHC_PRAGMA INTERFACE VERSION 5 #-} -interface Readline where -import PreludeIOError(IOError13) -import PreludeMonadicIO(Either) -type RlCallbackFunction = Int -> Int -> _State _RealWorld -> (Either IOError13 Int, _State _RealWorld) -addHistory :: [Char] -> _State _RealWorld -> (Either IOError13 (), _State _RealWorld) - {-# GHC_PRAGMA _A_ 2 _U_ 22 _N_ _N_ _N_ _N_ #-} -readline :: [Char] -> _State _RealWorld -> (Either IOError13 [Char], _State _RealWorld) - {-# GHC_PRAGMA _A_ 2 _U_ 21 _N_ _S_ "SU(P)" {_A_ 2 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_ #-} -rlAddDefun :: [Char] -> (Int -> Int -> _State _RealWorld -> (Either IOError13 Int, _State _RealWorld)) -> Int -> _State _RealWorld -> (Either IOError13 (), _State _RealWorld) - {-# GHC_PRAGMA _A_ 4 _U_ 2211 _N_ _S_ "LLU(P)U(P)" {_A_ 4 _U_ 2222 _N_ _N_ _N_ _N_} _N_ _N_ #-} -rlBindKey :: Int -> (Int -> Int -> _State _RealWorld -> (Either IOError13 Int, _State _RealWorld)) -> _State _RealWorld -> (Either IOError13 (), _State _RealWorld) - {-# GHC_PRAGMA _A_ 3 _U_ 121 _N_ _S_ "U(P)LU(P)" {_A_ 3 _U_ 222 _N_ _N_ _N_ _N_} _N_ _N_ #-} -rlGetEnd :: _State _RealWorld -> (Either IOError13 Int, _State _RealWorld) - {-# GHC_PRAGMA _A_ 1 _U_ 2 _N_ _N_ _N_ _N_ #-} -rlGetLineBuffer :: _State _RealWorld -> (Either IOError13 [Char], _State _RealWorld) - {-# GHC_PRAGMA _A_ 1 _U_ 1 _N_ _S_ "U(P)" {_A_ 1 _U_ 2 _N_ _N_ _N_ _N_} _N_ _N_ #-} -rlGetMark :: _State _RealWorld -> (Either IOError13 Int, _State _RealWorld) - {-# GHC_PRAGMA _A_ 1 _U_ 2 _N_ _N_ _N_ _N_ #-} -rlGetPoint :: _State _RealWorld -> (Either IOError13 Int, _State _RealWorld) - {-# GHC_PRAGMA _A_ 1 _U_ 2 _N_ _N_ _N_ _N_ #-} -rlGetReadlineName :: _State _RealWorld -> (Either IOError13 [Char], _State _RealWorld) - {-# GHC_PRAGMA _A_ 1 _U_ 1 _N_ _S_ "U(P)" {_A_ 1 _U_ 2 _N_ _N_ _N_ _N_} _N_ _N_ #-} -rlInitialize :: _State _RealWorld -> (Either IOError13 (), _State _RealWorld) - {-# GHC_PRAGMA _A_ 1 _U_ 1 _N_ _S_ "U(P)" {_A_ 1 _U_ 2 _N_ _N_ _N_ _N_} _N_ _N_ #-} -rlPendingInput :: Int -> _State _RealWorld -> (Either IOError13 (), _State _RealWorld) - {-# GHC_PRAGMA _A_ 2 _U_ 12 _N_ _S_ "U(P)L" {_A_ 2 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_ #-} -rlPrompt :: _State _RealWorld -> (Either IOError13 [Char], _State _RealWorld) - {-# GHC_PRAGMA _A_ 1 _U_ 1 _N_ _S_ "U(P)" {_A_ 1 _U_ 2 _N_ _N_ _N_ _N_} _N_ _N_ #-} -rlSetDone :: Bool -> _State _RealWorld -> (Either IOError13 (), _State _RealWorld) - {-# GHC_PRAGMA _A_ 2 _U_ 12 _N_ _S_ "EL" _N_ _N_ #-} -rlSetEnd :: Int -> _State _RealWorld -> (Either IOError13 (), _State _RealWorld) - {-# GHC_PRAGMA _A_ 2 _U_ 12 _N_ _S_ "U(P)L" {_A_ 2 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_ #-} -rlSetLineBuffer :: [Char] -> _State _RealWorld -> (Either IOError13 (), _State _RealWorld) - {-# GHC_PRAGMA _A_ 2 _U_ 22 _N_ _N_ _N_ _N_ #-} -rlSetMark :: Int -> _State _RealWorld -> (Either IOError13 (), _State _RealWorld) - {-# GHC_PRAGMA _A_ 2 _U_ 12 _N_ _S_ "U(P)L" {_A_ 2 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_ #-} -rlSetPoint :: Int -> _State _RealWorld -> (Either IOError13 (), _State _RealWorld) - {-# GHC_PRAGMA _A_ 2 _U_ 12 _N_ _S_ "U(P)L" {_A_ 2 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_ #-} -rlSetReadlineName :: [Char] -> _State _RealWorld -> (Either IOError13 (), _State _RealWorld) - {-# GHC_PRAGMA _A_ 2 _U_ 22 _N_ _N_ _N_ _N_ #-} -rlTerminalName :: _State _RealWorld -> (Either IOError13 [Char], _State _RealWorld) - {-# GHC_PRAGMA _A_ 1 _U_ 1 _N_ _S_ "U(P)" {_A_ 1 _U_ 2 _N_ _N_ _N_ _N_} _N_ _N_ #-} -