4 lines
90 B
Haskell
4 lines
90 B
Haskell
ms = ";#"
|
|
|
|
main = getContents >>=
|
|
mapM_ (putStrLn . takeWhile (`notElem` ms)) . lines
|