mirror of
https://github.com/nicoburns/blessed-rs
synced 2024-11-12 23:17:12 +00:00
7 lines
No EOL
137 B
Haskell
7 lines
No EOL
137 B
Haskell
main = do
|
|
c <- getChar
|
|
if c /= ' '
|
|
then do
|
|
putChar c
|
|
main
|
|
else return () |