Added TODO

This commit is contained in:
Justin Ethier 2018-11-13 13:37:03 -05:00
parent 89e633db26
commit 8c033a7909

View file

@ -1181,6 +1181,15 @@
(c-code "")
args)))
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
(error `(Unsupported function application ,exp)))))))