From e864049136669057c2ee115056bf1595fc33c6db Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Tue, 18 Dec 2018 16:25:24 -0500 Subject: [PATCH] Remove experimental code --- scheme/cyclone/cps-optimizations.sld | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/scheme/cyclone/cps-optimizations.sld b/scheme/cyclone/cps-optimizations.sld index c13c8b51..bc37d082 100644 --- a/scheme/cyclone/cps-optimizations.sld +++ b/scheme/cyclone/cps-optimizations.sld @@ -929,9 +929,7 @@ (and arg ;; #f is a special value for init, so do not optimize it for now (or (const? arg) - (quote? arg) - (ref? arg) - ))) + (quote? arg)))) (cdr exp)) ) ;; Check for primitive calls that can be optimized out