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

TODO

Browse source
This commit is contained in:
Justin Ethier 2016-06-02 22:42:32 -04:00
parent 348b85c492
commit a62387cb03
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
scheme/cyclone/cps-optimizations.sld
View file

@ -438,7 +438,8 @@
; Application: ; Application:
((app? exp) ((app? exp)
(cond (cond
((ast:lambda? exp) ((and (ast:lambda? (car exp))
(all-prim-calls? (cdr exp)))
'TODO) 'TODO)
(else (else
(map contract-prims exp)))) (map contract-prims exp))))