aboutsummaryrefslogtreecommitdiff
path: root/ExecBrainfuck.icl
diff options
context:
space:
mode:
Diffstat (limited to 'ExecBrainfuck.icl')
-rw-r--r--ExecBrainfuck.icl14
1 files changed, 14 insertions, 0 deletions
diff --git a/ExecBrainfuck.icl b/ExecBrainfuck.icl
new file mode 100644
index 0000000..84dd546
--- /dev/null
+++ b/ExecBrainfuck.icl
@@ -0,0 +1,14 @@
+module ExecBrainfuck
+
+import StdEnv, Brainfuck
+
+Start :: *World -> *World
+Start world
+# (io,world) = stdio world
+# (program,io) = freadline io
+# (ok,world) = fclose io world
+# world = run (read program) [] world
+# (io,world) = stdio world
+# io = io <<< '\n'
+# (ok,world) = fclose io world
+= world