summaryrefslogtreecommitdiff
path: root/Thue
diff options
context:
space:
mode:
Diffstat (limited to 'Thue')
-rw-r--r--Thue/Interpreter.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Thue/Interpreter.hs b/Thue/Interpreter.hs
index cbf58a4..b6602c3 100644
--- a/Thue/Interpreter.hs
+++ b/Thue/Interpreter.hs
@@ -33,7 +33,7 @@ interpret state rules gen = do
state' <- case (replacement ruleToApply) of
":::" -> getLine >>= (\x -> return (before ++ x ++ after))
- '~':xs -> putStrLn xs >> return (before ++ after)
+ '~':xs -> putStr xs >> return (before ++ after)
x -> return (before ++ x ++ after)