sfeng/lisp-interpreter-rb
1
0
Fork 0
mirror of https://github.com/vonhyou/lisp-interpreter.git synced 2025-06-07 18:01:59 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

last commit

Browse source
This commit is contained in:
vonhyou 2021-04-15 01:56:02 +08:00
parent b0bd6e899d
commit c9bf4efd0f
1 changed files with 8 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

14
prol.rb
View file

@ -4,7 +4,7 @@
##### Parser
module Lisp
module Prolisp
def self.parse(program)
read_tokens(tokenize(program))
@ -57,10 +57,12 @@ module Lisp
end
@global_env.merge! quote: ->(*args) { args.to_a }
@global_env.merge! cons: ->(*args) { args.to_a }
@global_env.merge! car: ->(arr) { arr[0] }
@global_env.merge! cdr: ->(arr) { arr[1..-1] }
@global_env.merge! print: ->(arg) { p arg }
@global_env.merge! cons: ->(*args) { args.to_a }
@global_env.merge! car: ->(arr) { arr[0] }
@global_env.merge! cdr: ->(arr) { arr[1..-1] }
@global_env.merge! print: ->(arg) { p arg }
@global_env.merge! min: ->(arr) { arr.min }
@global_env.merge! max: ->(arr) { arr.max }
@global_env
end
@ -115,4 +117,4 @@ https://github.com/vonhyou/lisp-interpreter\n\n"
end
end
Lisp.repl
Prolisp.repl