From 81e0f82046600724df9ef1dd51dee0d875ef4358 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Thu, 11 Feb 2021 23:02:20 -0500 Subject: [PATCH] Fix order of arguments --- scheme/cyclone/cgen.sld | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scheme/cyclone/cgen.sld b/scheme/cyclone/cgen.sld index 5dfc2cbb..4bd09347 100644 --- a/scheme/cyclone/cgen.sld +++ b/scheme/cyclone/cgen.sld @@ -2357,12 +2357,12 @@ ")->fn)(data, buf[0], 1, buf);") (emit* "}") - (emit* "void c_" (lib:name->string lib-name) "_entry_pt(void *data, int argc, object cont, object value){ ") + (emit* "void c_" (lib:name->string lib-name) "_entry_pt(void *data, object cont, int argc, object value){ ") (emit* " register_library(\"" (lib:name->unique-string lib-name) "\");") (if (null? lib-pass-thru-exports) - (emit* " c_" (lib:name->string lib-name) "_entry_pt_first_lambda(data, argc, cont, value);") + (emit* " c_" (lib:name->string lib-name) "_entry_pt_first_lambda(data, cont, argc, value);") ;; GC to ensure objects are moved when exporting exports. ;; Otherwise there will be broken hearts :( (emit*