fix: reattach the newline that Haskell strips on input

This commit is contained in:
Glen Whitney 2021-03-13 08:56:41 -08:00
parent f827c37baa
commit d142ad2c03

View File

@ -34,7 +34,9 @@ rules
putStr(d) putStr(d)
return s return s
emit s = getLine emit s = do
l <- getLine
return (l ++ "\n")
main = do main = do
[<Preactions>()]return [val]] [<Preactions>()]return [val]]