diff --git a/scheme/cyclone/transforms.sld b/scheme/cyclone/transforms.sld
index 3f11e6f5..fd5ab5db 100644
--- a/scheme/cyclone/transforms.sld
+++ b/scheme/cyclone/transforms.sld
@@ -1223,7 +1223,7 @@
        (cond
         ((ref? (car ast))
          `( ,(prim:func->prim (car ast) (- (length ast) 1))
-            ,@(cdr ast)))
+            ,@(map conv (cdr ast))))
         (else
          (map conv ast))))
       (else