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

WIP

Browse source
This commit is contained in:
Justin Ethier 2016-10-13 18:55:37 -04:00
parent acaea412ea
commit 2019937b97
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
scheme/cyclone/transforms.sld
View file

@ -1064,8 +1064,8 @@
(cdr ast))))) (cdr ast)))))
(if (precompute-prim-app? converted) (if (precompute-prim-app? converted)
converted ; TODO:(eval converted) ;; OK, evaluate at compile time converted ; TODO:(eval converted) ;; OK, evaluate at compile time
converted))) ;; No, see if we can fast-convert it ;converted))) ;; No, see if we can fast-convert it
;(prim:inline-convert-prim-call converted)))) ;; No, see if we can fast-convert it (prim:inline-convert-prim-call converted)))) ;; No, see if we can fast-convert it
((lambda? ast) ((lambda? ast)
(let* ((args (lambda-formals->list ast)) (let* ((args (lambda-formals->list ast))
(ltype (lambda-formals-type ast)) (ltype (lambda-formals-type ast))