diff options
Diffstat (limited to 'samples/fun/IO.bruijn')
| -rw-r--r-- | samples/fun/IO.bruijn | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/samples/fun/IO.bruijn b/samples/fun/IO.bruijn new file mode 100644 index 0000000..725e093 --- /dev/null +++ b/samples/fun/IO.bruijn @@ -0,0 +1,6 @@ +# read two lines using monadic I/O +# printf "i love\nmonads\n" | bruijn IO.bruijn + +:import std/IO . + +main read-line >>= [read-line >>= [return [0 2 1]]] |