Common Lisp: Add documentation
[jackhill/mal.git] / ruby / step0_repl.rb
CommitLineData
107d9694 1require_relative "mal_readline"
f705f0fc
JM
2
3# read
4def READ(str)
5 return str
6end
7
8# eval
9def EVAL(ast, env)
10 return ast
11end
12
13# print
14def PRINT(exp)
15 return exp
16end
17
18# repl
19def REP(str)
20 return PRINT(EVAL(READ(str), {}))
21end
22
86b689f3 23# repl loop
718887c3 24while line = _readline("user> ")
f705f0fc
JM
25 puts REP(line)
26end