Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-23 20:15:05 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Issue #21 - Allow eval to handle optional args

Browse source
This commit is contained in:
Justin Ethier 2016-08-18 02:43:05 -04:00
parent ae3f906d24
commit 46f84b5265
1 changed files with 3 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
scheme/eval.sld
View file

@ -482,13 +482,12 @@
(apply-primitive-procedure proc args))
((compound-procedure? proc)
((procedure-body proc)
(let ((
(env:extend-environment
(formals->list
(procedure-parameters proc))
;(pack-lambda-arguments
;(procedure-parameters proc)
args ;)
(pack-lambda-arguments
(procedure-parameters proc)
args)
(procedure-environment proc))))
((procedure? proc)
(apply