diff options
| author | Joel Martin <github@martintribe.org> | 2014-12-24 23:17:38 -0700 |
|---|---|---|
| committer | Joel Martin <github@martintribe.org> | 2015-01-09 16:16:54 -0600 |
| commit | 5400d4bf5e7fe7f968a4553f55101de962a39ef7 (patch) | |
| tree | 99db6dc9e3adc27678ce2bb36bef8a7b83ada171 /haskell/Readline.hs | |
| parent | c150ec41f4f0b8f384f4b1b493a5ca61db42573c (diff) | |
| download | mal-5400d4bf5e7fe7f968a4553f55101de962a39ef7.tar.gz mal-5400d4bf5e7fe7f968a4553f55101de962a39ef7.zip | |
Haskell: add error handling and try*/catch*.
Achieve self-hosting!
Diffstat (limited to 'haskell/Readline.hs')
| -rw-r--r-- | haskell/Readline.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/haskell/Readline.hs b/haskell/Readline.hs index 483c827..bbde009 100644 --- a/haskell/Readline.hs +++ b/haskell/Readline.hs @@ -10,6 +10,8 @@ import qualified System.Console.Readline as RL import System.Directory (getHomeDirectory) +import System.IO (hGetLine, hFlush, hIsEOF, stdin, stdout) + history_file = do home <- getHomeDirectory return $ home ++ "/.mal-history" |