From ac021ef35e44e2d8bf82d27bbc7079a55aa2bf04 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Thu, 10 Nov 2016 19:03:54 -0500 Subject: [PATCH] WIP --- scheme/cyclone/cps-optimizations.sld | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/scheme/cyclone/cps-optimizations.sld b/scheme/cyclone/cps-optimizations.sld index 232bfb0b..dcad45e4 100644 --- a/scheme/cyclone/cps-optimizations.sld +++ b/scheme/cyclone/cps-optimizations.sld @@ -754,7 +754,9 @@ (lambda (e) ;; TODO: experimental change, append args to formals instead ;; of just passing formals along - (analyze:find-inlinable-vars e (append formals args))) + ;(analyze:find-inlinable-vars e (append formals args))) +;; try this for now, do a full make then re-make and verify everything works + (analyze:find-inlinable-vars e formals)) (ast:lambda-body exp)))) ((const? exp) #t) ((quote? exp) #t)