summaryrefslogtreecommitdiff
path: root/lore/Language/Bs/Repl.hs
diff options
context:
space:
mode:
authorBen Sima <ben@bsima.me>2019-03-27 23:07:51 -0700
committerBen Sima <ben@bsima.me>2019-03-27 23:07:51 -0700
commit794b248d0afb9ae7eae1bc0d8f6498a903e02e23 (patch)
treeb9a10065ed357f8ab2ad8cc112a88a197ec445f1 /lore/Language/Bs/Repl.hs
parent4ecc513e5917057f50150e2cb0a1d63d6010f0d7 (diff)
bs: formatting
Diffstat (limited to 'lore/Language/Bs/Repl.hs')
-rw-r--r--lore/Language/Bs/Repl.hs2
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 ()