diff options
| -rw-r--r-- | samples/fun/IO.bruijn | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/samples/fun/IO.bruijn b/samples/fun/IO.bruijn index 725e093..06facbd 100644 --- a/samples/fun/IO.bruijn +++ b/samples/fun/IO.bruijn @@ -3,4 +3,6 @@ :import std/IO . -main read-line >>= [read-line >>= [return [0 2 1]]] +main get-line >>= [get-line >>= [return [0 2 1]]] + +:test (main "i love\nmonads\n") ([0 [0 "i love" "monads"] [[0]]]) |