From 2019937b975fdf855b1b08b1a4cd749ef5159dbc Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Thu, 13 Oct 2016 18:55:37 -0400 Subject: [PATCH] WIP --- scheme/cyclone/transforms.sld | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scheme/cyclone/transforms.sld b/scheme/cyclone/transforms.sld index 444d3bb8..cc183432 100644 --- a/scheme/cyclone/transforms.sld +++ b/scheme/cyclone/transforms.sld @@ -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))