diff options
Diffstat (limited to 'lore/Language/Bs/Repl.hs')
| -rw-r--r-- | lore/Language/Bs/Repl.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lore/Language/Bs/Repl.hs b/lore/Language/Bs/Repl.hs index 35e473f..64ffaa2 100644 --- a/lore/Language/Bs/Repl.hs +++ b/lore/Language/Bs/Repl.hs @@ -21,7 +21,7 @@ repl = do minput <- getInputLine "bs> " case minput of Nothing -> outputStrLn "bye." - Just input -> liftIO (process input) >> repl + Just input -> (liftIO $ process input) >> repl --Just input -> (liftIO $ processToAST input) >> repl process :: String -> IO () |