1
1
mirror of https://github.com/kanaka/mal.git synced 2024-11-11 00:52:44 +03:00
mal/ruby/step1_read_print.rb
2015-02-28 00:36:27 +01:00

35 lines
518 B
Ruby

require_relative "mal_readline"
require_relative "types"
require_relative "reader"
require_relative "printer"
# read
def READ(str)
return read_str(str)
end
# eval
def EVAL(ast, env)
return ast
end
# print
def PRINT(exp)
return _pr_str(exp, true)
end
# repl
def REP(str)
return PRINT(EVAL(READ(str), {}))
end
# repl loop
while line = _readline("user> ")
begin
puts REP(line)
rescue Exception => e
puts "Error: #{e}"
puts "\t#{e.backtrace.join("\n\t")}"
end
end