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

Added TODO

Browse source
This commit is contained in:
Justin Ethier 2016-08-13 22:52:15 -04:00
parent 55f4a7403c
commit d322ccea65
1 changed files with 9 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
scheme/eval.sld
View file

@ -10,6 +10,7 @@
(define-library (scheme eval) (define-library (scheme eval)
(import (import
(scheme cyclone util) (scheme cyclone util)
(scheme cyclone transforms)
;(scheme cyclone libraries) ;; for handling import sets ;(scheme cyclone libraries) ;; for handling import sets
(scheme base) (scheme base)
(scheme file) (scheme file)
@ -482,9 +483,14 @@
(apply-primitive-procedure proc args)) (apply-primitive-procedure proc args))
((compound-procedure? proc) ((compound-procedure? proc)
((procedure-body proc) ((procedure-body proc)
(env:extend-environment (procedure-parameters proc) (env:extend-environment
args ;; TODO: need to pass lambdas as a list (depending on type), and
(procedure-environment proc)))) ;; split up args accordingly (create a list for varargs)
;(lambda-formals->list
(procedure-parameters proc);)
args
(procedure-environment proc))))
((procedure? proc) ((procedure? proc)
(apply (apply
proc proc