diff --git a/scheme/cyclone/cps-optimizations.sld b/scheme/cyclone/cps-optimizations.sld index 3ebe83a3..086dd52b 100644 --- a/scheme/cyclone/cps-optimizations.sld +++ b/scheme/cyclone/cps-optimizations.sld @@ -1094,7 +1094,7 @@ (opt:inline-prims `(Cyc-seq ,@(cdr exp) - ,(ast:lambda-body (car exp))) + ,@(ast:lambda-body (car exp))) scope-sym refs)) (else