From d96314993dad155418986c77d0119d0df0d7a957 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Sat, 10 Nov 2018 07:03:37 -0500
Subject: [PATCH] use new file

---
 scheme/cyclone/cps-optimizations.sld | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/scheme/cyclone/cps-optimizations.sld b/scheme/cyclone/cps-optimizations.sld
index 9fa75a88..61b1c7a2 100644
--- a/scheme/cyclone/cps-optimizations.sld
+++ b/scheme/cyclone/cps-optimizations.sld
@@ -34,6 +34,7 @@
       opt:contract
       opt:inline-prims
       opt:beta-expand
+      opt:local-var-reduction
       adb:clear!
       adb:get
       adb:get/default
@@ -95,6 +96,7 @@
       with-fnc
       with-fnc!
   )
+  (include "local-var-redux.scm")
   (begin
     ;; The following two defines allow non-CPS functions to still be considered
     ;; for certain inlining optimizations.