sjs/sectorlisp
1
0
Fork 0
mirror of https://github.com/samsonjs/sectorlisp.git synced 2026-03-25 09:05:48 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix extra arg in LISP evaluator

Browse source 
Fixes #12 reported by @derhexenmeister
This commit is contained in:
Justine Tunney 2021-11-13 15:16:37 -08:00
parent df9c01c46c
commit 2c760a29e4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp.lisp
View file

@ -99,7 +99,7 @@ NIL
(QUOTE (LAMBDA (M A) (QUOTE (LAMBDA (M A)
(COND ((EQ M ()) ()) (COND ((EQ M ()) ())
((QUOTE T) (CONS (EVAL (CAR M) A) ((QUOTE T) (CONS (EVAL (CAR M) A)
(EVLIS (CDR M) A A)))))) (EVLIS (CDR M) A))))))
(QUOTE (LAMBDA (FN X A) (QUOTE (LAMBDA (FN X A)
(COND (COND
((ATOM FN) ((ATOM FN)