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

Added TODO

Browse source
This commit is contained in:
Justin Ethier 2018-11-13 13:37:03 -05:00
parent 89e633db26
commit 8c033a7909
1 changed files with 9 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
scheme/cyclone/cgen.sld
View file

@ -1181,6 +1181,15 @@
(c-code "") (c-code "")
args))) args)))
exps)) exps))
((equal? 'let fun)
(let* ((vars/vals (cadr exp))
(body (caddr exp))
)
TODO: foldr over vars/vals
TODO: compile body exp and combine with above
(c-compile-exp body append-preamble cont ast-id trace cps?)
)
)
(else (else
(error `(Unsupported function application ,exp))))))) (error `(Unsupported function application ,exp)))))))