diff --git a/scheme/cyclone/cgen.sld b/scheme/cyclone/cgen.sld
index 3fffa9a0..c9126e6e 100644
--- a/scheme/cyclone/cgen.sld
+++ b/scheme/cyclone/cgen.sld
@@ -2009,8 +2009,8 @@
         (else
          (emit*
            "static void __lambda_" 
-           (number->string (car l)) "(void *data, int argc, "
-           (cdadr l)
+           (number->string (car l)) 
+           "(void *data, object clo, object k, int argc, object *args"
            ") ;"))))
      lambdas)