diff --git a/scheme/cyclone/cps-optimizations.sld b/scheme/cyclone/cps-optimizations.sld index 92e40837..a866c650 100644 --- a/scheme/cyclone/cps-optimizations.sld +++ b/scheme/cyclone/cps-optimizations.sld @@ -91,7 +91,7 @@ (define (adbv-set-assigned-value-helper! sym var value) (define (update-lambda-atv! syms value) -(trace:error `(update-lambda-atv! ,syms ,value)) +;(trace:error `(update-lambda-atv! ,syms ,value)) (cond ((ast:lambda? value) (let ((id (ast:lambda-id value)))