fix: reattach the newline that Haskell strips on input
All checks were successful
continuous-integration/drone/push Build is passing
continuous-integration/drone/pr Build is passing

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]]