Julia: step0

diff --git a/julia/step0_repl.jl b/julia/step0_repl.jl
new file mode 100755 (executable)
index 0000000..7e61105
--- /dev/null
+++ b/julia/step0_repl.jl
@@ -0,0 +1,32 @@
+#!/usr/bin/env julia
+
+# READ
+function READ(str)
+    str
+end
+
+# EVAL
+function EVAL(ast, env)
+    ast
+end
+
+# PRINT
+function PRINT(exp)
+    exp
+end
+
+# REPL
+function REP(str)
+    return PRINT(EVAL(READ(str), {}))
+end
+
+while true
+    print("user> ")
+    flush(STDOUT)
+    line = readline(STDIN)
+    if line == ""
+        break
+    end
+    line = chomp(line)
+    println(REP(line))
+end