From fe08c5ae9652d37e4e0a2bfb2d03433ec7371e41 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Fri, 21 Sep 2018 13:22:05 -0400
Subject: [PATCH] Bug fixes

---
 scheme/cyclone/cgen.sld | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/scheme/cyclone/cgen.sld b/scheme/cyclone/cgen.sld
index 4a47192d..a66e3037 100644
--- a/scheme/cyclone/cgen.sld
+++ b/scheme/cyclone/cgen.sld
@@ -938,9 +938,9 @@
                           "(data,"
                           this-cont
                           ","
-                          c-lambda-fnc-str
-                          ","
                           c-lambda-fnc-gc-ret-str
+                          ","
+                          c-lambda-fnc-str
                           (if (> num-cargs 0) "," "")
                           (c:body cargs)
                           ");"))
@@ -1627,7 +1627,7 @@
           (with-fnc (ast:lambda-id ast) (lambda (fnc)
             (when (and (adbf:well-known fnc)
                        (equal? (adbf:closure-size fnc) 1))
-  (trace:error `(JAE ,l ,fnc))
+;(trace:error `(JAE ,l ,fnc))
            (let* ((params-str (cdadr l))
                   (args-str
                     (string-join