diff --git a/scheme/cyclone/cps-optimizations.sld b/scheme/cyclone/cps-optimizations.sld
index 0ae66fa4..1d2f67e1 100644
--- a/scheme/cyclone/cps-optimizations.sld
+++ b/scheme/cyclone/cps-optimizations.sld
@@ -644,7 +644,7 @@
     (define (inline-prim-call? exp ivars args)
       (call/cc
         (lambda (return)
-          (trace:error `(inline-ok? ,exp ,ivars ,args))
+          ;(trace:error `(inline-ok? ,exp ,ivars ,args))
           (inline-ok? exp ivars args (list #f) return)
           (return #t))))