This commit is contained in:
Justin Ethier 2016-10-13 18:55:37 -04:00
parent acaea412ea
commit 2019937b97

View file

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